﻿Public Class clSueloDañinoEventArgs : Inherits EventArgs
    Public Property Daño As Integer

    Public Sub New(ByVal Daño As Integer)
        _Daño = Daño
    End Sub
    Public Sub Dañar(ByVal Heroe As clHeroe)
        Heroe.VidaRestante = Heroe.VidaRestante - Daño
    End Sub
End Class
